home *** CD-ROM | disk | FTP | other *** search
/ Interactive Quarterly / The Best of New Machine Publishing 1 - Disc 4: Interactive Quarterly.iso / pc / cafe / ultslots.dir / 00193_setCursors.ls < prev    next >
Encoding:
Text File  |  1996-10-06  |  823 b   |  24 lines
  1. on setCursors
  2.   global left, center, right, Hand, IQcursor
  3.   set L to the number of member "ArrowL"
  4.   set LMask to the number of member "ArrowML"
  5.   preloadMember(L, LMask)
  6.   set left to [L, LMask]
  7.   set c to the number of member "ArrowC"
  8.   set CMask to the number of member "ArrowMC"
  9.   preloadMember(c, CMask)
  10.   set center to [c, CMask]
  11.   set r to the number of member "ArrowR"
  12.   set RMask to the number of member "ArrowMR"
  13.   preloadMember(r, RMask)
  14.   set right to [r, RMask]
  15.   set H to the number of member "Hand"
  16.   set HMask to the number of member "HandMask"
  17.   preloadMember(H, HMask)
  18.   set Hand to [H, HMask]
  19.   set iconMember to the number of member "IQ Cursor"
  20.   set iconMemberMask to the number of member "IQ Cursor Mask"
  21.   preloadMember(iconMember, iconMemberMask)
  22.   set IQcursor to [iconMember, iconMemberMask]
  23. end
  24.